﻿Public Class clsSysParam
    Public Function selectMesSwitch() As DataTable
        Dim szSql As String = "SELECT * FROM sf.t_sys_param WHERE param_key = ? "
        Return DBacs.ExecuteSql(szSql, -1, "mes_switch")
    End Function

    Public Function selectMesWebSite() As DataTable
        Dim szSql As String = "SELECT * FROM sf.t_sys_param WHERE param_key = ? "
        Return DBacs.ExecuteSql(szSql, -1, "mes_website")
    End Function
End Class
